home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / C-Cl / CD-ROM Tutorial.cpt / CD-ROM Tutorial / card_3566.txt < prev    next >
Text File  |  1990-04-04  |  1KB  |  55 lines
  1. -- card: 3566 from stack: in
  2. -- bmap block id: 3820
  3. -- flags: 0000
  4. -- background id: 12172
  5. -- name: 
  6. ----- HyperTalk script -----
  7. on openCard
  8.   global e,c
  9.   hide menubar
  10. end openCard
  11. on mouseUp
  12.   global e,c,m,geo,f,b,w,con,wild,prox,number,num,ber,wo,map,browse
  13.   global app,over,fact,search
  14.   if e is 1 and c is 1 and m is 1 and geo is 1 and f is 1 and b is 1 and w is 1
  15.   then
  16.   put "1" into app
  17. end if
  18. if wo is 1 and browse is 1 and map is 1
  19. then
  20. put "1" into fact
  21. end if
  22. if wild is 1 and con is 1 and prox is 1
  23. then
  24. put "1" into search
  25. end if
  26. if number is 1 and num is 2 and ber is 1
  27. then
  28. put "1" into over
  29. end if
  30. if app is 1 and fact is 1 and search is 1 and over is 1
  31. then
  32. go to next card
  33. else
  34.   doMenu "Quit Hypercard"
  35. end if
  36. end mouseUp
  37.  
  38.  
  39. -- part 5 (field)
  40. -- low flags: 00
  41. -- high flags: 0001
  42. -- rect: left=171 top=328 right=342 bottom=329
  43. -- title width / last selected line: 0
  44. -- icon id / first selected line: 0 / 0
  45. -- text alignment: 1
  46. -- font id: 21
  47. -- text size: 10
  48. -- style flags: 256
  49. -- line height: 13
  50. -- part name: 
  51.  
  52.  
  53. -- part contents for card part 5
  54. ----- text -----
  55. Click anywhere to Exit.